From: Glenn Morris Date: Sat, 18 Aug 2007 23:45:29 +0000 (+0000) Subject: (scheme-mode-variables): Set font-lock-comment-start-skip. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~534^2~3^2~1783 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=3a7ff1cbeff651fa6c3a815178129ed46261eecf;p=emacs.git (scheme-mode-variables): Set font-lock-comment-start-skip. --- diff --git a/lisp/progmodes/scheme.el b/lisp/progmodes/scheme.el index 5bf7cb1e9eb..e5fb8cbc7f8 100644 --- a/lisp/progmodes/scheme.el +++ b/lisp/progmodes/scheme.el @@ -156,6 +156,7 @@ ;; Look within the line for a ; following an even number of backslashes ;; after either a non-backslash or the line beginning. (setq comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+[ \t]*") + (set (make-local-variable 'font-lock-comment-start-skip) ";+ *") (make-local-variable 'comment-column) (setq comment-column 40) (make-local-variable 'parse-sexp-ignore-comments)